home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 43 / Mac Magazin and MacEasy Magazine CD - Issue 43.iso / Software / Mobiles Büro / Newton / Newton Utilities / MORGANPro-DM / MORGAN.adf < prev    next >
Text File  |  1997-05-04  |  2KB  |  67 lines
  1. // Definition of the MORGAN program
  2. //
  3. // The ID in Tracks matches one ID in Covers
  4. // if user imports data the id in tracks must match an id in covers
  5. //
  6. application "MORGAN:VtHick" called "MORGAN" 
  7. // with options { "nofolders" }
  8.  
  9. soup "Tracks:MORGAN:VtHick" called "Tracks" of "MORGAN:VtHick"
  10.  
  11. overview "Tracks" called "MORGAN*Tracks" of "Tracks:MORGAN:VtHick" queries "_uniqueID" contains
  12.     {
  13.     column "ID"  width 70 is id
  14.     column "Track" width 30 is track
  15.     column "Title" width 70 is title
  16.     column "Artist" width 70 is artist
  17.     column "Time" width 30 is time
  18.     }
  19.  
  20. class "Track:MORGAN:VtHick" called "Track" of "Tracks:MORGAN:VtHick" contains
  21.     {
  22.     id: integer called "ID"
  23.     track: integer called "Track"
  24.     title: string called "Title"
  25.     artist: string called "Artist"
  26.     time:string called "Time"
  27. //    sample:sound called "Sample"
  28.     notes:note called "Lyrics&Notes"
  29.     }
  30.  
  31.  
  32. soup "Covers:MORGAN:VtHick" called "Covers" of "MORGAN:VtHick"
  33.  
  34. overview "Covers" called "MORGAN*Covers" of "Covers:MORGAN:VtHick" queries "_uniqueID" contains
  35.     {
  36.     column "Title" width 70 is title
  37.     column "Artist" width 70 is artist
  38.     column "Media" width 50 is media
  39.     column "Genre"  width 50 is genre1
  40.     }
  41.  
  42. class "Cover:MORGAN:VtHick" called "Covers" of "Covers:MORGAN:VtHick" contains
  43.     {
  44.     id: integer called "id"
  45.     title: string called "Title"
  46.     artist: string called "Artist"
  47.     label:string called "Label"
  48.     media:string called "Media"
  49.     catalog:string called "Catalog"
  50.     year:string called "Year"
  51.     genre1:string called "Genre1"
  52.     genre2:string called "Genre2"
  53.     length:string called "Length"
  54.     rating:string called "Rating"
  55.     producer:string called "Producer"
  56.     received:string called "Received"
  57.     quality:string called "Quality"
  58.     purchasedAt:string called "Purchased At"
  59.     purchasedDate:datetime called "Purchased Date"
  60.     purchasedPrice:string called "Purchased Price"
  61.     currentPrice:string called "Current Price"
  62.     inventory:string called "Inventory"
  63.     loanedTo:string called "Loaned To"
  64.     loanedDate:string called "Loaned Date"
  65.     Notes:note called "Notes"
  66.     }
  67.